home *** CD-ROM | disk | FTP | other *** search
/ HyperLib 1997 Winter - Disc 1 / HYPERLIB-1997-Winter-CD1.ISO.7z / HYPERLIB-1997-Winter-CD1.ISO / オンラインウェア / PRG / SysMenu 1.4 Folder.sit / SysMenu 1.4 Folder / SysMenu 1.4 / patches.h < prev    next >
Text File  |  1996-03-18  |  4KB  |  103 lines

  1. // File "patches.h" - 
  2.  
  3. #ifndef ____PATCHES_HEADER____
  4. #define ____PATCHES_HEADER____
  5.  
  6. #include <MixedMode.h>
  7.  
  8. // * ******************************************************************************* *
  9. // * ******************************************************************************* *
  10.  
  11. #if !GENERATINGCFM
  12. typedef pascal void (*InsertMenuProcPtr)(MenuHandle, short);
  13. typedef InsertMenuProcPtr InsertMenuUPP;
  14. enum {
  15.     uppInsertMenuProcInfo = 0
  16.     };
  17. #define NewInsertMenuProc(proc) (InsertMenuUPP)(proc)
  18. #define CallInsertMenuProc(proc, p1, p2) (* (InsertMenuProcPtr) (proc))(p1, p2)
  19. #else
  20. typedef UniversalProcPtr InsertMenuUPP;
  21. enum {
  22.     uppInsertMenuProcInfo = kPascalStackBased
  23.          | STACK_ROUTINE_PARAMETER(1, SIZE_CODE(sizeof(MenuHandle)))
  24.          | STACK_ROUTINE_PARAMETER(2, SIZE_CODE(sizeof(short)))
  25.     };
  26. #define NewInsertMenuProc(proc) (InsertMenuUPP) ¥
  27.         NewRoutineDescriptor((ProcPtr)(proc), uppInsertMenuProcInfo, GetCurrentISA())
  28. #define CallInsertMenuProc(proc, p1, p2) ¥
  29.         (void) CallUniversalProc((UniversalProcPtr) (proc), uppInsertMenuProcInfo, p1, p2)
  30. #endif
  31.  
  32. // *   * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *   *
  33.  
  34. #if !GENERATINGCFM
  35. typedef pascal void (*DrawMenuBarProcPtr)(void);
  36. typedef DrawMenuBarProcPtr DrawMenuBarUPP;
  37. enum {
  38.     uppDrawMenuBarProcInfo = 0
  39.     };
  40. #define NewDrawMenuBarProc(proc) (DrawMenuBarUPP)(proc)
  41. #define CallDrawMenuBarProc(proc) (* (DrawMenuBarProcPtr) (proc))()
  42. #else
  43. typedef UniversalProcPtr DrawMenuBarUPP;
  44. enum {
  45.     uppDrawMenuBarProcInfo = kPascalStackBased
  46.     };
  47. #define NewDrawMenuBarProc(proc) (DrawMenuBarUPP) ¥
  48.         NewRoutineDescriptor((ProcPtr)(proc), uppDrawMenuBarProcInfo, GetCurrentISA())
  49. #define CallDrawMenuBarProc(proc) ¥
  50.         (void) CallUniversalProc((UniversalProcPtr) (proc), uppDrawMenuBarProcInfo)
  51. #endif
  52.  
  53. // *   * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *   *
  54.  
  55. #if !GENERATINGCFM
  56. typedef pascal long (*MenuSelectProcPtr)(Point);
  57. typedef MenuSelectProcPtr MenuSelectUPP;
  58. enum {
  59.     uppMenuSelectProcInfo = 0
  60.     };
  61. #define NewMenuSelectProc(proc) (MenuSelectUPP)(proc)
  62. #define CallMenuSelectProc(proc, p1) (* (MenuSelectProcPtr) (proc))(p1)
  63. #else
  64. typedef UniversalProcPtr MenuSelectUPP;
  65. enum {
  66.     uppMenuSelectProcInfo = kPascalStackBased
  67.          | RESULT_SIZE(SIZE_CODE(sizeof(long)))
  68.          | STACK_ROUTINE_PARAMETER(1, SIZE_CODE(sizeof(Point)))
  69.     };
  70. #define NewMenuSelectProc(proc) (MenuSelectUPP) ¥
  71.         NewRoutineDescriptor((ProcPtr)(proc), uppMenuSelectProcInfo, GetCurrentISA())
  72. #define CallMenuSelectProc(proc, p1) ¥
  73.         (long) CallUniversalProc((UniversalProcPtr) (proc), uppMenuSelectProcInfo, p1)
  74. #endif
  75.  
  76. // *   * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *   *
  77.  
  78. #if !GENERATINGCFM
  79. typedef pascal void (*SystemMenuProcPtr)(long);
  80. typedef SystemMenuProcPtr SystemMenuUPP;
  81. enum {
  82.     uppSystemMenuProcInfo = 0
  83.     };
  84. #define NewSystemMenuProc(proc) (SystemMenuUPP)(proc)
  85. #define CallSystemMenuProc(proc, p1) (* (SystemMenuProcPtr) (proc))(p1)
  86. #else
  87. typedef UniversalProcPtr SystemMenuUPP;
  88. enum {
  89.     uppSystemMenuProcInfo = kPascalStackBased
  90.          | STACK_ROUTINE_PARAMETER(1, SIZE_CODE(sizeof(long)))
  91.     };
  92.     
  93. #define NewSystemMenuProc(proc) (SystemMenuUPP) ¥
  94.         NewRoutineDescriptor((ProcPtr)(proc), uppSystemMenuProcInfo, GetCurrentISA())
  95. #define CallSystemMenuProc(proc, p1) ¥
  96.         (void) CallUniversalProc((UniversalProcPtr) (proc), uppSystemMenuProcInfo, p1)
  97. #endif
  98.  
  99. // * ******************************************************************************* *
  100. // * ******************************************************************************* *
  101.  
  102. #endif  ____PATCHES_HEADER____
  103.